DCR reading in FormAPI

Forgive me if this sounds stupid.... But can one open and read a DCR (in the content store) in a FormAPI script?

TS 6.7.1 SP2, Win 2003 Server.

Find more posts tagged with

Comments

Adam Stoller

Forgive me if this sounds stupid.... But can one open and read a DCR (in the content store) in a FormAPI script?

TS 6.7.1 SP2, Win 2003 Server.

FormAPI is a layer within DCT processing - so (as far as I know) only the DCR opened via Edit DCR can be read and processed with FormAPI.

Aryan

Thanks fish. I was of the same opinion. Call server seemed to be the only option to achieve this from the FormAPI.

I just wanted to confirm my understanding.

ISCBorisB

Thanks fish. I was of the same opinion. Call server seemed to be the only option to achieve this from the FormAPI.

I just wanted to confirm my understanding.

Call Sever is not your only option.

From DCR1 FormAPI you can open a DCR2 using CC URL Command edit. Like that:
var DCRHandle = window.open('/iw/webdesk/edit?vpath=Your Target DCR Vpath', 'Target DCR', 'Your Window Specs');
With DCRHandle you can access Target DCR's FormAPI functions, open/close/edit Target Form, whatever...

Adam Stoller

Call Sever is not your only option.

From DCR1 FormAPI you can open a DCR2 using CC URL Command edit. Like that:
var DCRHandle = window.open('/iw/webdesk/edit?vpath=Your Target DCR Vpath', 'Target DCR', 'Your Window Specs');
With DCRHandle you can access Target DCR's FormAPI functions, open/close/edit Target Form, whatever...

Hmm - interesting - but this requires that the second DCR be opened up visually - right?

I was under the impression that the desire was to do it all programmatically without the user seeing a second window pop-up.

I suppose you could try to set the coordinates for the new window to be off-screen, but that tends to have confusing results with regard to focus and having the icon/tab appear for the window in the bottom tray (or whatever you call that thing across the bottom of Windows)

ISCBorisB

Hmm - interesting - but this requires that the second DCR be opened up visually - right?

I was under the impression that the desire was to do it all programmatically without the user seeing a second window pop-up.

I suppose you could try to set the coordinates for the new window to be off-screen, but that tends to have confusing results with regard to focus and having the icon/tab appear for the window in the bottom tray (or whatever you call that thing across the bottom of Windows)

Normally new DCR Form Page opens up visible. However, 'left' and 'top' are among standard Window specs (third parameter of 'open' method).
If the goal is to get something from another DCR and immediately bail out we can open it *in the basement* in the first place, process
and close right away. That won't even have a 'blinking' effect.

ads66

From DCR1 FormAPI you can open a DCR2 using CC URL Command edit. Like that:
var DCRHandle = window.open('/iw/webdesk/edit?vpath=Your Target DCR Vpath', 'Target DCR', 'Your Window Specs');
With DCRHandle you can access Target DCR's FormAPI functions, open/close/edit Target Form, whatever...

I am trying this. what is happening is i can open the target DCR as new window. However, i don't seem to get access to the objects of my target DCR which i opened up. Like form api elements or something. i can't even get the values. my dilema is how i can best use form api on the target DCR that opens up

I already am using getScriptFrame but that referes to the parent window or the window that opens the target DCR.
Please suggest something here. I am actually new to this.

Adam Stoller

From DCR1 FormAPI you can open a DCR2 using CC URL Command edit. Like that:
var DCRHandle = window.open('/iw/webdesk/edit?vpath=Your Target DCR Vpath', 'Target DCR', 'Your Window Specs');
With DCRHandle you can access Target DCR's FormAPI functions, open/close/edit Target Form, whatever...

I am trying this. what is happening is i can open the target DCR as new window. However, i don't seem to get access to the objects of my target DCR which i opened up. Like form api elements or something. i can't even get the values. my dilema is how i can best use form api on the target DCR that opens up

I already am using getScriptFrame but that referes to the parent window or the window that opens the target DCR.
Please suggest something here. I am actually new to this.

Let's take a step back here:

ISCBorisB

I already am using getScriptFrame but that referes to the parent window

Of course it refers to the parent window, what else did you expect? You have to use Handler to gain target access.
Hope you realize that it's neither documented nor supported. Sure, it can be done. It's remarks like the one above
though that makes me wonder if I should really have posted these cross-DCR notes in the first place. You've been warned

// Note that the following code has not been tested
// Keep this pair of variables global, you'll need them in other places as well
var targetHandle;
var targetScriptFrame;

function showTarget(dcrVPath) {
   var tagpath = "/iw/webdesk/edit?vpath=" + dcrVPath;
   targetHandle = window.open(tagpath,"_blank","left=100,top=100,width=500,height=400,status=yes,toolbar=no,location=no,resizable=yes,scrollbars=yes");
   gainTargetAccess();
}
function gainTargetAccess() {
   var errorMsg;

   if (targetHandle)
      if ((typeof targetHandle.top.gIsInitialRender=="undefined") || (targetHandle.top.gIsInitialRender==true)) {
         setTimeout("gainTargetAccess()", 500);
      else
         try {targetScriptFrame = targetHandle.parent.getScriptFrame();}
         catch (err) {errorMsg = err.description;}
   else
      errorMsg = "Error - Undefined Handle!";

   if (errorMsg) alert(errorMsg);
}

Layout.jpg

ads66

Thanks, I thought i will try this out. However, when i try to get the handle on the target DCR, it gives me an error saying "Object does not support this property or method". I guess this is due to the target DCR's form api function not getting supported? I am however, able to open the target DCR. Could you suggest on this....

Thanks,
A

ISCBorisB

Thanks, I thought i will try this out. However, when i try to get the handle on the target DCR, it gives me an error saying "Object does not support this property or method". I guess this is due to the target DCR's form api function not getting supported? I am however, able to open the target DCR. Could you suggest on this....

Thanks,
A

If you post your code I'll take a look

JoshProx

I have a similar requirement where I have a child DCR to which I need to add/delete a replicant item when a replicant item gets added/deleted in the parent dcr. I think I'll try using an event handler in parent dct which calls the edit on the child dcr's where I'll have formapi code for addInstance or deleteInstance.

ads66

Below is the complete CGI...

[thml]
#!D:\Interwoven\TeamSite/iw-perl/bin/iwperl

use TeamSite: Smiley Very Happy

CRNode;
use TeamSite::CGI_lite;
use Log::Log4perl qw(:easy);
use File::Find;

#flush the cache
$|=1;

#TeamSite global variable
our $IWHOME = TeamSite::Config::iwgethome();
our $iwmount = TeamSite::Config::iwgetmount();
our $hostname = TeamSite::Config::hostname();
my ($arrayoutput, $jsoutput, $mc_mName, $fullFilePath, @nodelist);

#Create CGI object
my $cgi = TeamSite::CGI_lite->new();
$cgi->parse_data();

my $form_name = $cgi->{'form'}{'iw_form_name'};
my $element_name = $cgi->{'form'}{'iw_callback_var'};
my $user_name = $cgi->{'form'}{'user_name'};
my $item_name = $cgi->{'form'}{'iw_item_name'};
my $item_value = $cgi->{'form'}{'iw_item_value'};
my $item_description = $cgi->{'form'}{'iw_item_description'};
my $dcr_name = $cgi->{'form'}{'iw_object_name'};
my $area_path = $cgi->{'form'}{'area_path'};
my $data_type = $cgi->{'form'}{'iw_tdt'};
my $query = $cgi->{'form'}{'query'};
my $flag = $cgi->{'form'}{'flag'};
my $mpath = $cgi->{'form'}{'mpath'};
my $mc_name1 = $cgi->{'form'}{'mc_name1'};

Log::Log4perl::init($IWHOME.'/custom/Logging/attach_model_category.conf');
my $logger = Log::Log4perl->get_logger($IWHOME.'/iw-bin/testsearch.ipl');

$area_path =~ s#//iwcmsdev(.*)#$1#g;
my ($workareaname) = ($area_path =~ /WORKAREA\/(.*)/g);
$logger->debug("area_path, $area_path");
$logger->debug("workareaname, $workareaname");

$dir = $iwmount.$area_path."/templatedata/Content/Model/data/en_GB/";
$catdir = $iwmount.$area_path."/templatedata/Content/ModelCategory/data/en_GB/";
$featuresdir = $iwmount.$area_path."/templatedata/Content/Feature/data/en_GB/";

my $displaypath = "/iw-cc/command/iw.ccpro.launch_edit_form?vpath=//iwcmsdev".$area_path."/templatedata/Content/ModelCategory/data/en_GB/";

$jsoutput .= "api.IWDatacapture.getItem(\"/model/Model Information/modelCode\").setReadOnly(false);";

if ($flag eq undef) {
print_search_ui();
}

if ($flag eq "SEARCH_MODEL_CATEGORY") {
our $featcatdcr = $iwmount.$area_path."/templatedata/Content/ModelCategory/data/";
find(\&findModelCategory, $featcatdcr);
print_ui( );
}

if ($flag eq "ATTACH_DCR_VALUE") {
loadCoreFeatures();
print_model_id();
}

exit 0;

#Sub to search and display search results of model category dcr
sub findModelCategory
{
$fullFilePath=$File::Find::name;
if (-f $fullFilePath) {
open(FILE, "$fullFilePath");
$logger->debug("the path is: $fullFilePath");
my $xmloutput;
while(){
$xmloutput .= $_;
}
close(FILE);
my $rootnode=TeamSite: Smiley Very Happy

CRnode->new($xmloutput);
my $mc_name=$rootnode->value('modelCategoryId');
$mc_mName=$rootnode->value('modelCategoryModelId');
if(($mc_name =~ m/$query/i)||($query eq "%")||($query eq "")){
my $ydrivepath= $fullFilePath;
$fullFilePath =~ s|\\|\/|g;
$fullFilePath =~ s|.*?/(.*)|//iwcmsdev/$1|g;
my $dcrURL = "/iw-cc/command/iw.ccpro.launch_edit_form?vpath=$fullFilePath";
my $featurelink="$mc_name
\n";
push(@featurelist, $featurelink);

}

}
}

####Load code feature sub
sub loadCoreFeatures() {
$mc_name1 =~ s#\\#/#g;
if (-f $mc_name1) {
open(FILE, "$mc_name1");
my $xmloutput;
while(){
$xmloutput .= $_;
}
close(FILE);
my $rootnode=TeamSite: Smiley Very Happy

CRnode->new($xmloutput);
if ($rootnode ne "") {
my @featurelist = $rootnode->get_node_list('modelCategoryCoreFeature');
foreach my $featurelistitem (@featurelist) {
my $count=0;
my $featuredcrpath = $featuresdir.$featurelistitem->value('modelCategoryFeatureId');
my $feature_default_value = $featurelistitem->value('modelCategoryFeatureDefaultValue');
my $feature_default_value_boolean = $featurelistitem->value('modelCategoryFeatureDefaultBoolean');
my $feature_default_value_select = $featurelistitem->value('modelCategoryFeatureDefaultSelect');
if (-f $featuredcrpath) {
open(FILE, "$featuredcrpath");
$featxmloutput='';
while(){
$featxmloutput .= $_;
}
close(FILE);
}
$featrootnode=TeamSite: Smiley Very Happy

CRnode->new($featxmloutput);
if ($featrootnode ne "") {
my $feature_id = $featrootnode->value('featureName');
my $feature_select = $featrootnode->value('featureSelectList');
my $feature_type = $featrootnode->value('featureValueType');
my $feature_best_feature = $featrootnode->value('featureBestFeatureFlag');
if ($feature_default_value_boolean eq "T") {
$feature_default_value_boolean = 0;
}
else {
if ($feature_default_value_boolean eq "F") {
$feature_default_value_boolean = 1;
}
else {
$feature_default_value_boolean = -1;
}
}
if ($feature_select ne "") {
my $enumselectpath = $workarea."/templatedata/Content/Enumeration/data/en_GB/feature/".$feature_select;
$arrayoutput="var optionArray = new Array();\n";
my $counter=0;
if (-f $enumselectpath) {
open(FILE, "$enumselectpath");
$enumxmloutput='';
while(){
$enumxmloutput .= $_;
}
close(FILE);
$enumrootnode=TeamSite: Smiley Very Happy

CRnode->new($enumxmloutput);
if ($enumrootnode ne "") {
my @selectlist = $enumrootnode->get_node_list('enumerationItem');
foreach my $listitem (@selectlist)
{
my $key=$listitem->value('enumerationItemKey');
my $value=$listitem->value('enumerationItemValue');
if ($value eq $feature_default_value_select) {
$arrayoutput.="optionArray[$counter] = new Option(\"$value\",\"$key\", true, true);\n";
}
else {
$arrayoutput.="optionArray[$counter] = new Option(\"$value\",\"$key\");\n";
}
$counter++;
}
}
}
}
$jsoutput.="if ((firstitem != true) && (api.IWDatacapture.getItem(\"/model/Feature Information/modelFeature[\"+count+\"]/modelFeatureId\").getValue() != 'null')) {\n";
$jsoutput.="count++;\n";
$jsoutput.="api.IWDatacapture.getItem(\"/model/Feature Information/modelFeature\").addInstance(count);\n";
$jsoutput.="}\n";
$jsoutput.="firstitem = false;\n";
$jsoutput.="var j=0;\n";
$jsoutput.="var featureIndex = -1;\n";
$jsoutput.="while (featureIndex == -1) {\n";
$jsoutput.=" if (api.IWDatacapture.getItem(\"/model/Feature Information/modelFeature[\"+count+\"]/modelFeatureId\").getOptions().value == '$feature_id') {\n";
$jsoutput.=" featureIndex=j;\n";
$jsoutput.=" }\n";
$jsoutput.=" j++;\n";
$jsoutput.="}\n";
$jsoutput.="api.IWDatacapture.getItem(\"/model/Feature Information/modelFeature[\"+count+\"]/modelFeatureId\").setValue(featureIndex);\n";
$jsoutput.="api.IWDatacapture.getItem(\"/model/Feature Information/modelFeature[\"+count+\"]/modelFeatureEnumName\").setValue('$feature_select');\n";
if ($feature_type eq 'Boolean') {
$jsoutput.="api.IWDatacapture.getItem(\"/model/Feature Information/modelFeature[\"+count+\"]/modelFeaturePresent\").setVisible(true);\n";
$jsoutput.="api.IWDatacapture.getItem(\"/model/Feature Information/modelFeature[\"+count+\"]/modelFeaturePresent\").setRequired(true);\n";
if ($feature_default_value_boolean > -1) {
$jsoutput.="api.IWDatacapture.getItem(\"/model/Feature Information/modelFeature[\"+count+\"]/modelFeaturePresent\").setValue($feature_default_value_boolean);\n";
}
$jsoutput.="api.IWDatacapture.getItem(\"/model/Feature Information/modelFeature[\"+count+\"]/modelFeatureSelect\").setVisible(false);\n";
}
elsif ($feature_type eq 'Select') {
$jsoutput.="api.IWDatacapture.getItem(\"/model/Feature Information/modelFeature[\"+count+\"]/modelFeatureSelect\").setVisible(true);\n";
$jsoutput.="api.IWDatacapture.getItem(\"/model/Feature Information/modelFeature[\"+count+\"]/modelFeatureSelect\").setRequired(true);\n";
$jsoutput.=$arrayoutput;
$jsoutput.="api.IWDatacapture.getItem(\"/model/Feature Information/modelFeature[\"+count+\"]/modelFeatureSelect\").setOptions(optionArray);\n";
}
else {
$jsoutput.="api.IWDatacapture.getItem(\"/model/Feature Information/modelFeature[\"+count+\"]/modelFeatureSelect\").setVisible(false);\n";
$jsoutput.="api.IWDatacapture.getItem(\"/model/Feature Information/modelFeature[\"+count+\"]/modelFeatureValue\").setVisible(true);\n";
$jsoutput.="api.IWDatacapture.getItem(\"/model/Feature Information/modelFeature[\"+count+\"]/modelFeatureValue\").setValue('$feature_default_value');\n";
}
if ($feature_best_feature eq "T") {
$jsoutput .= "api.IWDatacapture.getItem(\"/model/Feature Information/modelFeature[\"+count+\"]/modelBestFeatureFlag\").setValue(0);\n";
}
}
}
}
}
}

sub canonicalizePath
{
my ($cpath) = @_;
# -- Get rid of forward slashes
$cpath =~ s#\\#/#g;
# -- Get rid of double quotes
$cpath =~ s#\"##g;
return $cpath;
}

sub print_search_ui {
print_header();
print <<"END";

Please enter Category to search:

END

print_footer();
return;
}

sub print_ui {

print_header();
print <<"END";

@featurelist

END

print_footer();

return;
}

sub print_model_id {

print_header();

print <<"END";

Are you sure you want to Attach the below Model Category to current model:: $mc_name1

END
print_footer();
return;
}

sub error_message {
my (@msgs) = @_;

print_header();
foreach my $message (@msgs)
{
print $message;
}

print <<"END";

END

print_footer();
return;
}

sub print_header {
print <<"END";

Model Category Lookup Facility
<SCRIPT LANGUAGE="JavaScript">
var api=opener.top.getScriptFrame();
var count=api.IWDatacapture.getItem("/model/Feature Information/modelFeature/").getChildren().length;
var firstitem=true;
$jsoutput

function fetchSelected(){
for(i=0;i {
if(document.callout_form.mc_name1.checked){
var temp= document.callout_form.mc_name1.getAttribute("id");

}
}

api.IWDatacapture.getItem("/model/Model Information/modelThreeDUrl").setVisible(true);
api.IWDatacapture.getItem("/model/Model Information/modelManufacturerCpwCode").setVisible(true);
api.IWDatacapture.getItem("/model/Model Information/modelVideo").setVisible(true);
api.IWDatacapture.getItem("/model/Model Information/modelVideoType").setVisible(true);
api.IWDatacapture.getItem("/model/Model Information/modelSmallImageType").setVisible(true);
api.IWDatacapture.getItem("/model/Model Information/modelDesignType").setVisible(true);
api.IWDatacapture.getItem("/model/Model Information/modelOverview").setVisible(true);
api.IWDatacapture.getItem("/model/Model Information/modelOverviewType").setVisible(true);
api.IWDatacapture.getItem("/model/Model Information/modelMarketingDescriptionType").setVisible(true);
alert(api.IWDatacapture.getItem("/model/Model Information/modelCode").getValue());
api.IWDatacapture.redraw();
var targetHandle;
var targetScriptFrame;
targetHandle = window.open(temp);
//THIS IS WHERE I WANT TO SET THE VALUE////
try {targetScriptFrame = targetHandle.parent.getScriptFrame();}
catch (err) {errorMsg = err.description;}
if (errorMsg){
alert(errorMsg);
}
else
{
alert(targetScriptFrame);
}
document.callout_form.submit();
}
</SCRIPT>

Model Categories for $mc_name Category(Select A Model Category Name)

END

return;
}

sub print_footer {
print <<"END";

END
return;
}

[/html]

ISCBorisB

What you coded is not what I've proposed. If you want to use my approach, please re-read previous posts from this thread
and modify your code accordingly.

Note two things in particular

If I were you I would work with small POC fragment and incorporate it into full-blown CGI after making sure that it works.

ads66

Thanks, I will re-try the suggestion...and get back